home *** CD-ROM | disk | FTP | other *** search
/ Info-Mac 4 / Info_Mac IV CD-ROM (Pacific HiTech Inc.)(August 1994).iso / Science / RLaB / toolbox / min2.r < prev    next >
Text File  |  1994-04-25  |  347b  |  16 lines
  1. //-------------------------------------------------------------------//
  2. //
  3. //  Syntax:     min2 ( A, B )
  4.  
  5. //  Description:
  6.  
  7. //  Return a matrix the same size as A and B with the smallest
  8. //  elements taken from A and B.
  9.  
  10. //-------------------------------------------------------------------//
  11.  
  12. min2 = function(a,b)
  13. {
  14.   return (b+(a-b).*(a<b));
  15. };
  16.